Top 10k strings from Base de Datos (1986)(Investronica)(es).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   3 4%,                          "
   2 ;"LOS DATOS SON CORRECTOS (S/N) ?"
   1 z$(rd,l(10
   1 z$(i)=z$(i+1
   1 z$(a)=z$(b):
   1 y$(i)=y$(i+1
   1 y$(a)=y$(b):
   1 x$(i)=x$(i+1
   1 x$(a)=x$(b):
   1 w$(i)=w$(i+1
   1 w$(a)=w$(b):
   1 v$(i)=v$(i+1
   1 v$(a)=v$(b):
   1 u$(i)=u$(i+1
   1 u$(a)=u$(b):
   1 t$(i)=t$(i+1
   1 t$(a)=t$(b):
   1 s$(i)=s$(i+1
   1 s$(a)=s$(b):
   1 r$(i)=r$(i+1
   1 r$(a)=r$(b):
   1 q$(i)=q$(i+1
   1 q$(a)=q$(b):
   1 i$="Nombre del campo No "
   1 i$="CONSULTAS"
   1 ebobine la cinta pues voy a ve-ficar los datos grabados";
   1 c$=(c$+b$+b$)(
   1 c$=(c$+b$+B$)(
   1 c$=(c$+B$+b$)(
   1 b$="                                "
   1 a$(i)="A":
   1 Utility: Database
   1 TOTALIZACION
   1 Si no quiere que se verifique   pulse 
   1 Sergio Martinez
   1 SALIDA PROGRAMA
   1 PANTALLA  
   1 Not original tape
   1 I$="MODIFICACIONES"
   1 I$="BAJAS REGISTROS"
   1 GRABACION FICHERO
   1 Fichero (Base de datos)
   1 FICHERO   H
   1 FICHERO   
   1 ;i$;i;" ? Max. 10":
   1 ;"Tipo ?":
   1 ;"Registro adelante(A) o atras(B) "
   1 ;"REGISTRO CORRECTO ? (S/N) M=MENU"
   1 ;"Pulse la entrada correcta       "
   1 ;"Pulse campo a cambiar (T=Todos) ":
   1 ;"Pulse campo a cambiar           "
   1 ;"Porque campo busco ? (M=Menu)"
   1 ;"Porque campo ? (M=Menu)"
   1 ;"Por que campo ? (M=Menu)        "
   1 ;"Por pantalla o impresora ? (P/I)"
   1 ;"PULSE M PARA VOLVER AL MENU"
   1 ;"Nueva modificacion (S/N)        "
   1 ;"Nueva baja ? (s/n)              "
   1 ;"NUEVA CONSULTA ? (S/N)          ":
   1 ;"M= Menu"
   1 ;"Longitud ?":
   1 ;"EL ARCHIVO ESTA                 CORRECTAMENTE GRABADO      ":
   1 ;"Desde que registro ?            ":
   1 ;"CREACION FICHEROS":
   1 ;"CONTINUO ?":
   1 ;"CLASIFICACION"
   1 ;"ATENCION EL FICHERO":
   1 ;" Totalizacion        "
   1 ;" Salida del programa "
   1 ;" Registros";
   1 ;" Modificacion        "
   1 ;" Listados            "
   1 ;" Libres "
   1 ;" Grabacion fichero   "
   1 ;" Creacion fichero    "
   1 ;" Consultas           "
   1 ;" Clasificacion       "
   1 ;" Baja registro       "
   1 ;" Alta registro       "
   1 ;" ALTAS REGISTROS ";
   1 ;"  MENU  "
   1 ;"   Por favor pulse una opcion"
   1 ;"      ENTRADA NO NUMERICA       "
   1 ; "SERA DESTRUIDO":
   1 4%,   00000000000000000000000000000000000000000000000000000000000000006666666666666666666666666666666666666666666666666666666666666666
   1 4%                           "
   1 4                            "
   1 *******CREACION FICHERO********************************
   1 ********BAJAS REGISTROS********************************
   1 ********ALTAS REGISTROS********************************
   1 *********MODIFICACIONES********************************
   1 **********CLASIFICACION********************************
   1 ***********TOTALIZACION********************************
   1 **************consultas********************************
   1 ***************LISTADOS********************************
   1 ***************GRABACION************************************
   1 ***************BUSQUEDA********************************
   1 );"       TIPO         LONG.
   1 "PANTALLA"
   1 "Numeros de campos ? (Maximo 10)":
   1 "Numerico"
   1 "NO DISPONE DE NINGUN","REGISTRO LIBRE":
   1 "CONTINUO ? ";C$
   1 "Alfanumerico":
   1 "ATENCION EL FICHERO ACTUAL SERA DESTRUIDO",
   1  PARA VOLVER AL MENU ";C$:
   1  , despues escriba   GOTO 100 y pulse 
   1  """"""                          """"""                          "!!!!!!                         "99999!                         "99999!                         "99999!                         "99999!                         "99999!                         "99999!                         "99999!                          99999!                                                                                       "                              "
   1    ESTE CAMPO NO ES NUMERICO    
   1       NO EXISTE             
   1       ARCHIVO CLASIFICADO
   1         Clasificando            
   1          Fin listado            
   1                              "
   1